home *** CD-ROM | disk | FTP | other *** search
/ Virtual Top Model / Virtual Top Model - Disc 1.iso / modulos / mod-3.dxr / 00035_boton lupa.ls < prev    next >
Encoding:
Text File  |  1997-04-01  |  708 b   |  27 lines
  1. on mouseUp
  2.   if rollOver(27) then
  3.     set the member of sprite 27 to member "lupa apa" of castLib "elementos graficos"
  4.     puppetSprite(27, 0)
  5.     updateStage()
  6.     repeat with xx = 1 to 29
  7.       set the visible of sprite xx to 0
  8.     end repeat
  9.     set the visible of sprite 47 to 0
  10.     set the visible of sprite 33 to 0
  11.     set the visible of sprite 37 to 0
  12.     go("lupa")
  13.   end if
  14. end
  15.  
  16. on mouseDown
  17.   repeat while the stillDown
  18.     puppetSprite(27, 1)
  19.     if rollOver(27) then
  20.       set the member of sprite 27 to member "lupa ilu" of castLib "elementos graficos"
  21.     else
  22.       set the member of sprite 27 to member "lupa apa" of castLib "elementos graficos"
  23.     end if
  24.     updateStage()
  25.   end repeat
  26. end
  27.